// TOWN SPECIAL ENCOUNTERS
//    Town 4: Shayder

beginzonescript;

variables;

short im_hostile = 0;
short max_crime = 200;
short last_abil;
short counter = 0;
short set_ter = 0;

body;

beginstate INIT_STATE;
	last_abil = get_current_tick();

//	set_name(,);
//	add_range_to_group(,,groupn);

	set_personality_name(80,"Ahonar");
	set_personality_name(81,"Mayor Bernathy");
	set_personality_name(82,"Grunders");
	set_personality_name(83,"Sara");

	set_personality_name(84,"Bohman");
	set_personality_name(85,"Rippel");
	set_personality_name(86,"Begbie");
	set_personality_name(87,"Renton");
	set_personality_name(88,"Mickie");
	set_personality_name(89,"Irvine");
	
		set_personality_name(90,"Boyle");
	set_personality_name(91,"Jed");
	set_personality_name(100,"Arkley");
	set_personality_name(92,"Deland");
	set_personality_name(93,"Sick Boy");
	set_personality_name(94,"Spud");
	set_personality_name(95,"Cassie");
	set_personality_name(96,"Meena");
	set_personality_name(97,"Lockhart");
	set_personality_name(98,"Judith");
	set_personality_name(144,"Plague Victim");
	set_personality_name(101,"Vlad");


	set_name(33,"Temple Scribe");
	
	set_crime_tolerance(max_crime);

	if (gf(309,11) == 0) {
		if (revive_party()) {
			print_str_color("Entering a friendly major city heals your wounds",2);
			print_str_color("  and restores your spell energy.",2);
			}
		}
		else {
			print_str_color("You enter this town as a foe of the Anama. They raise an alarm.",2);
			make_zone_hostile();
			}
	break;

beginstate EXIT_STATE;
break;

beginstate START_STATE;
	if (get_ran(1,0,100) < 10)
		give_char_text_bubble(401,"Welcome.");
	if (get_ran(1,0,100) < 10)
		give_char_text_bubble(401,"The altar holds our prayers.");
	if (get_ran(1,0,100) < 10)
		give_char_text_bubble(401,"Sit and rest.");
	if (get_ran(1,0,100) < 10)
		give_char_text_bubble(443,"Hello, traveler.");
	if (get_ran(1,0,100) < 10)
		give_char_text_bubble(443,"I am useless here.");
	if (get_ran(1,0,100) < 10)
		give_char_text_bubble(456,"Hack. Cough.");
	if (get_ran(1,0,100) < 10)
		give_char_text_bubble(456,"So cold.");
	if (get_ran(1,0,100) < 10)
		give_char_text_bubble(456,"Even more useless now.");
	if (get_ran(1,0,100) < 10)
		give_char_text_bubble(402,"Need a job?");
	if (get_ran(1,0,100) < 10)
		give_char_text_bubble(402,"Job board is outside.");
	if (get_ran(1,0,100) < 10)
		give_char_text_bubble(402,"I buy and sell.");
	if (get_ran(1,0,100) < 10)
		give_char_text_bubble(405,"I'm not going.");
	if (get_ran(1,0,100) < 10)
		give_char_text_bubble(405,"Magic is not evil.");
	if (get_ran(1,0,100) < 10)
		give_char_text_bubble(405,"I don't fear the Anama.");
	if (get_ran(1,0,100) < 10)
		give_char_text_bubble(404,"Need an ointment?");
	if (get_ran(1,0,100) < 10)
		give_char_text_bubble(404,"I have salves.");
	if (get_ran(1,0,100) < 10)
		give_char_text_bubble(404,"Care for an unguent?");
	if (get_ran(1,0,100) < 10)
		give_char_text_bubble(406,"Need provisions?");
	if (get_ran(1,0,100) < 10)
		give_char_text_bubble(406,"I keep a clean shop.");
	if (get_ran(1,0,100) < 10)
		give_char_text_bubble(406,"No bugs here!");
	if (get_ran(1,0,100) < 10)
		give_char_text_bubble(457,"Cough.");
	if (get_ran(1,0,100) < 10)
		give_char_text_bubble(457,"Wheeze.");
	if (get_ran(1,0,100) < 10)
		give_char_text_bubble(457,"Nothing is clean anymore.");
	if (get_ran(1,0,100) < 10)
		give_char_text_bubble(403,"Ah got weapons.");
	if (get_ran(1,0,100) < 10)
		give_char_text_bubble(403,"Please to help ya.");
	if (get_ran(1,0,100) < 10)
		give_char_text_bubble(403,"Fine blades here.");
	if (get_ran(1,0,100) < 10)
		give_char_text_bubble(407,"Imported armor.");
	if (get_ran(1,0,100) < 10)
		give_char_text_bubble(407,"We got the good stuff.");
	if (get_ran(1,0,100) < 10)
		give_char_text_bubble(407,"Fine armor from Gale.");
	if (get_ran(1,0,100) < 10)
		give_char_text_bubble(409,"Cough.");
	if (get_ran(1,0,100) < 10)
		give_char_text_bubble(409,"(Wipe. Wipe.)");
	if (get_ran(1,0,100) < 10)
		give_char_text_bubble(409,"Need ale?");
	if (get_ran(1,0,100) < 10)
		give_char_text_bubble(409,"The master suite is free.");
	if (get_ran(1,0,100) < 10)
		give_char_text_bubble(410,"(Sip.)");
	if (get_ran(1,0,100) < 10)
		give_char_text_bubble(410,"More drink.");
	if (get_ran(1,0,100) < 10)
		give_char_text_bubble(410,"What you lookin' at?");
	if (get_ran(1,0,100) < 10)
		give_char_text_bubble(411,"Bah.");
	if (get_ran(1,0,100) < 10)
		give_char_text_bubble(411,"Wasting time.");
	if (get_ran(1,0,100) < 10)
		give_char_text_bubble(411,"Still stuck here.");
	if (get_ran(1,0,100) < 10)
		give_char_text_bubble(411,"Should be out on the sea.");
	if (get_ran(1,0,100) < 10)
		give_char_text_bubble(412,"Are you sick?");
	if (get_ran(1,0,100) < 10)
		give_char_text_bubble(412,"Another patient?");
	if (get_ran(1,0,100) < 10)
		give_char_text_bubble(412,"Do you have herbs?");
	if (get_ran(1,0,100) < 10)
		give_char_text_bubble(413,"This is the library.");
	if (get_ran(1,0,100) < 10)
		give_char_text_bubble(413,"Please keep your hands clean.");
	if (get_ran(1,0,100) < 10)
		give_char_text_bubble(413,"I sell maps.");
	if (get_ran(1,0,100) < 10)
		give_char_text_bubble(452,"Ahonar is so wise.");
	if (get_ran(1,0,100) < 10)
		give_char_text_bubble(452,"(Sweep. Sweep.)");
	if (get_ran(1,0,100) < 10)
		give_char_text_bubble(452,"I'll go out and fight!");
	if (get_ran(1,0,100) < 10)
		give_char_text_bubble(415,"Spare a coin?");
	if (get_ran(1,0,100) < 10)
		give_char_text_bubble(415,"Cough.");
	if (get_ran(1,0,100) < 10)
		give_char_text_bubble(415,"Wheeze.");
	if (get_ran(1,0,100) < 10)
		give_char_text_bubble(416,"Give a few coins?");
	if (get_ran(1,0,100) < 10)
		give_char_text_bubble(416,"Help.");
	if (get_ran(1,0,100) < 10)
		give_char_text_bubble(416,"Cough. Cough.");
	if (get_ran(1,0,100) < 10)
		give_char_text_bubble(417,"Stay away.");
	if (get_ran(1,0,100) < 10)
		give_char_text_bubble(417,"I know your kind.");
	if (get_ran(1,0,100) < 10)
		give_char_text_bubble(417,"So disgusting.");
	if (get_ran(1,0,100) < 10)
		give_char_text_bubble(417,"(Squish!)");
	if (get_ran(1,0,100) < 10)
		give_char_text_bubble(458,"Curses.");
	if (get_ran(1,0,100) < 10)
		give_char_text_bubble(458,"I'm ... so weak.");
	if (get_ran(1,0,100) < 10)
		give_char_text_bubble(458,"Stop staring.");
	if (get_ran(1,0,100) < 10)
		give_char_text_bubble(425,"Welcome to you.");
	if (get_ran(1,0,100) < 10)
		give_char_text_bubble(425,"I help run the temple.");
	if (get_ran(1,0,100) < 10)
		give_char_text_bubble(425,"I teach sometimes.");
	if (get_ran(1,0,100) < 10)
		give_char_text_bubble(425,"I'll tell you of the Anama.");
	if (get_ran(1,0,100) < 10)
		give_char_text_bubble(420,"Need aid?");
	if (get_ran(1,0,100) < 10)
		give_char_text_bubble(420,"I'll be moving on soon.");
	if (get_ran(1,0,100) < 10)
		give_char_text_bubble(420,"I travel the isle.");
	if (get_ran(1,0,100) < 10)
		give_char_text_bubble(453,"Need a light?");
	if (get_ran(1,0,100) < 10)
		give_char_text_bubble(453,"I sell illumination.");
	if (get_ran(1,0,100) < 10)
		give_char_text_bubble(451,"Sad times.");
	if (get_ran(1,0,100) < 10)
		give_char_text_bubble(451,"Troubled times.");
	if (get_ran(1,0,100) < 10)
		give_char_text_bubble(451,"I aid where I can.");
	if (get_ran(1,0,100) < 10)
		give_char_text_bubble(451,"");
	if (gf(307,5) == 0) {
		if (get_ran(1,0,100) < 10)
			give_char_text_bubble(401,"Our faith is tested.");
		if (get_ran(1,0,100) < 10)
			give_char_text_bubble(401,"The plagues afflict us.");
		if (get_ran(1,0,100) < 10)
			give_char_text_bubble(443,"The bugs keep spreading.");
		if (get_ran(1,0,100) < 10)
			give_char_text_bubble(405,"I want to fight the plagues.");
		if (get_ran(1,0,100) < 10)
			give_char_text_bubble(412,"More patients?");
		if (get_ran(1,0,100) < 10)
			give_char_text_bubble(412,"It never ends.");
		if (get_ran(1,0,100) < 10)
			give_char_text_bubble(413,"I study the cockroaches.");
		if (get_ran(1,0,100) < 10)
			give_char_text_bubble(413,"I've learned many things.");

		}
	if (gf(307,5) > 0) {
		if (get_ran(1,0,100) < 10)
			give_char_text_bubble(401,"You have saved us.");
		if (get_ran(1,0,100) < 10)
			give_char_text_bubble(401,"You did much for us.");
		if (get_ran(1,0,100) < 10)
			give_char_text_bubble(443,"The plague has passed.");
		if (get_ran(1,0,100) < 10)
			give_char_text_bubble(405,"The roaches are losing.");
		if (get_ran(1,0,100) < 10)
			give_char_text_bubble(412,"A bit of hope.");
		if (get_ran(1,0,100) < 10)
			give_char_text_bubble(412,"Things are getting better.");
		if (get_ran(1,0,100) < 10)
			give_char_text_bubble(413,"The roaches are dying.");
		if (get_ran(1,0,100) < 10)
			give_char_text_bubble(413,"We may yet survive.");

		}
		
	if ((gf(4,6) > 0) && (set_ter == 0)) {
		set_ter = 1;
		kill_object(73,1);
		kill_object(311,1);
		kill_object(348,1);
		}
break;

beginstate 10;
break;

beginstate 11;
break;

beginstate 12;
break;

beginstate 13;
break;

beginstate 14;
break;

//	print_str("");
//	set_terrain_string_range("",1);
//	set_terrain_string_range("The sign says - .",1);

